home *** CD-ROM | disk | FTP | other *** search
/ develop, the CD; issue 1 / Apple_Develop_1989.bin / d e v e l o p (B&W) / d e v e l o p (B&W).rsrc / CODE_1.txt < prev    next >
Text File  |  1989-01-01  |  17KB  |  324 lines
  1. # near model CODE resource
  2. # jump table entries: 0-9 (10 of them)
  3. 00000000  0000 0122                ori.b      D0, 0x22 /* '\"' */
  4. export_0:
  5. 00000004  4278 0A4A                clr.w      [0x00000A4A /* FPState */]
  6. 00000008  9DCE                     sub.l      A6, A6
  7. 0000000A  4EBA 002C                jsr        [PC + 0x2C /* 00000038 */]
  8. 0000000E  4EBA 0220                jsr        [PC + 0x220 /* 00000230 */]
  9. 00000012  4267                     clr.w      -[A7]
  10. 00000014  4879 0000 FFFF           push.l     0xFFFF
  11. 0000001A  486F 0004                pea.l      [A7 + 0x4]
  12. 0000001E  4857                     pea.l      [A7]
  13. 00000020  3F3C 0001                move.w     -[A7], 0x1
  14. 00000024  223A FFDA                move.l     D1, [PC - 0x26 /* 00000000, value 0x122, cstring "" */]
  15. 00000028  4EB5 1000                jsr        [A5 + D1.w]
  16. 0000002C  A9F4                     syscall    ExitToShell
  17. 0000002E  4EBA 02B2                jsr        [PC + 0x2B2 /* 000002E2 */]
  18. 00000032  4EBA 022C                jsr        [PC + 0x22C /* 00000260 */]
  19. 00000036  4E75                     rts
  20. fn00000038:
  21. 00000038  598F                     subq.l     A7, 4
  22. 0000003A  2F3C 5A45 524F           move.l     -[A7], 0x5A45524F /* 'ZERO' */
  23. 00000040  4267                     clr.w      -[A7]
  24. 00000042  A9A0                     syscall    GetResource
  25. 00000044  2457                     movea.l    A2, [A7]
  26. 00000046  598F                     subq.l     A7, 4
  27. 00000048  2F3C 4441 5441           move.l     -[A7], 0x44415441 /* 'DATA' */
  28. 0000004E  4267                     clr.w      -[A7]
  29. 00000050  A9A0                     syscall    GetResource
  30. 00000052  2057                     movea.l    A0, [A7]
  31. 00000054  2050                     movea.l    A0, [A0]
  32. 00000056  2278 0908                movea.l    A1, [0x00000908 /* CurStackBase */]
  33. 0000005A  2452                     movea.l    A2, [A2]
  34. 0000005C  600E                     bra        +0x10 /* 0000006C */
  35. label0000005E:
  36. 0000005E  32D8                     move.w     [A1]+, [A0]+
  37. 00000060  660A                     bne        +0xC /* 0000006C */
  38. 00000062  321A                     move.w     D1, [A2]+
  39. 00000064  6002                     bra        +0x4 /* 00000068 */
  40. label00000066:
  41. 00000066  4219                     clr.b      [A1]+
  42. label00000068:
  43. 00000068  51C9 FFFC                dbf        D1, -0x6 /* 00000066 */
  44. label0000006C:
  45. 0000006C  BBC9                     cmpa.l     A5, A1
  46. 0000006E  66EE                     bne        -0x10 /* 0000005E */
  47. 00000070  A9A3                     syscall    ReleaseResource
  48. 00000072  A9A3                     syscall    ReleaseResource
  49. 00000074  598F                     subq.l     A7, 4
  50. 00000076  2F3C 4452 454C           move.l     -[A7], 0x4452454C /* 'DREL' */
  51. 0000007C  4267                     clr.w      -[A7]
  52. 0000007E  A9A0                     syscall    GetResource
  53. 00000080  2057                     movea.l    A0, [A7]
  54. 00000082  A025                     syscall    GetHandleSize
  55. 00000084  2050                     movea.l    A0, [A0]
  56. 00000086  E240                     asr        D0.w, 1
  57. 00000088  240D                     move.l     D2, A5
  58. 0000008A  6006                     bra        +0x8 /* 00000092 */
  59. label0000008C:
  60. 0000008C  3218                     move.w     D1, [A0]+
  61. 0000008E  D5B5 1000                add.l      [A5 + D1.w], D2
  62. label00000092:
  63. 00000092  51C8 FFF8                dbf        D0, -0xA /* 0000008C */
  64. 00000096  A9A3                     syscall    ReleaseResource
  65. 00000098  4E75                     rts
  66. export_1:
  67. 0000009A  205F                     movea.l    A0, [A7]+
  68. 0000009C  3218                     move.w     D1, [A0]+
  69. label0000009E:
  70. 0000009E  3418                     move.w     D2, [A0]+
  71. 000000A0  B058                     cmp.w      D0, [A0]+
  72. 000000A2  57C9 FFFA                dbeq       D1, -0x8 /* 0000009E */
  73. 000000A6  4A42                     tst.w      D2
  74. label000000A8:
  75. 000000A8  67FE                     beq        -0x0 /* 000000A8 */
  76. 000000AA  4EF0 20FC                jmp        [A0 + D2.w - 0x4]
  77. export_2:
  78. 000000AE  205F                     movea.l    A0, [A7]+
  79. 000000B0  3218                     move.w     D1, [A0]+
  80. label000000B2:
  81. 000000B2  3418                     move.w     D2, [A0]+
  82. 000000B4  B098                     cmp.l      D0, [A0]+
  83. 000000B6  57C9 FFFA                dbeq       D1, -0x8 /* 000000B2 */
  84. 000000BA  4A42                     tst.w      D2
  85. label000000BC:
  86. 000000BC  67FE                     beq        -0x0 /* 000000BC */
  87. 000000BE  4EF0 20FA                jmp        [A0 + D2.w - 0x6]
  88. export_3:
  89. 000000C2  205F                     movea.l    A0, [A7]+
  90. 000000C4  3218                     move.w     D1, [A0]+
  91. 000000C6  3418                     move.w     D2, [A0]+
  92. 000000C8  B042                     cmp.w      D0, D2
  93. 000000CA  6E0A                     bgt        +0xC /* 000000D6 */
  94. 000000CC  9041                     sub.w      D0, D1
  95. 000000CE  6D06                     blt        +0x8 /* 000000D6 */
  96. 000000D0  D040                     add.w      D0, D0
  97. 000000D2  41F0 0002                lea.l      A0, [A0 + D0.w + 0x2]
  98. label000000D6:
  99. 000000D6  3010                     move.w     D0, [A0]
  100. label000000D8:
  101. 000000D8  67FE                     beq        -0x0 /* 000000D8 */
  102. 000000DA  4EF0 0000                jmp        [A0 + D0.w]
  103. export_4:
  104. 000000DE  202F 0004                move.l     D0, [A7 + 0x4]
  105. 000000E2  2F41 0004                move.l     [A7 + 0x4], D1
  106. 000000E6  222F 0008                move.l     D1, [A7 + 0x8]
  107. 000000EA  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  108. 000000EE  48E7 3C00                movem.l    -[A7], D2,D3,D4,D5
  109. 000000F2  2400                     move.l     D2, D0
  110. 000000F4  2601                     move.l     D3, D1
  111. 000000F6  4842                     swap.w     D2
  112. 000000F8  C4C3                     mulu.w     D2, D3
  113. 000000FA  2800                     move.l     D4, D0
  114. 000000FC  2A01                     move.l     D5, D1
  115. 000000FE  4845                     swap.w     D5
  116. 00000100  C8C5                     mulu.w     D4, D5
  117. 00000102  D444                     add.w      D2, D4
  118. 00000104  4842                     swap.w     D2
  119. 00000106  4242                     clr.w      D2
  120. 00000108  C0C1                     mulu.w     D0, D1
  121. 0000010A  D082                     add.l      D0, D2
  122. 0000010C  4CDF 003C                movem.l    D2,D3,D4,D5, [A7]+
  123. 00000110  221F                     move.l     D1, [A7]+
  124. 00000112  4E75                     rts
  125. export_5:
  126. 00000114  202F 0004                move.l     D0, [A7 + 0x4]
  127. 00000118  2F41 0004                move.l     [A7 + 0x4], D1
  128. 0000011C  222F 0008                move.l     D1, [A7 + 0x8]
  129. 00000120  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  130. 00000124  48E7 3100                movem.l    -[A7], D2,D3,D7
  131. 00000128  4EBA 009C                jsr        [PC + 0x9C /* 000001C6 */]
  132. 0000012C  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  133. 00000130  221F                     move.l     D1, [A7]+
  134. 00000132  4E75                     rts
  135. export_6:
  136. 00000134  202F 0004                move.l     D0, [A7 + 0x4]
  137. 00000138  2F41 0004                move.l     [A7 + 0x4], D1
  138. 0000013C  222F 0008                move.l     D1, [A7 + 0x8]
  139. 00000140  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  140. 00000144  48E7 3100                movem.l    -[A7], D2,D3,D7
  141. 00000148  4EBA 007C                jsr        [PC + 0x7C /* 000001C6 */]
  142. 0000014C  2001                     move.l     D0, D1
  143. 0000014E  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  144. 00000152  221F                     move.l     D1, [A7]+
  145. 00000154  4E75                     rts
  146. export_7:
  147. 00000156  202F 0004                move.l     D0, [A7 + 0x4]
  148. 0000015A  2F41 0004                move.l     [A7 + 0x4], D1
  149. 0000015E  222F 0008                move.l     D1, [A7 + 0x8]
  150. 00000162  2F5F 0004                move.l     [A7 + 0x4], [A7]+
  151. 00000166  48E7 3100                movem.l    -[A7], D2,D3,D7
  152. 0000016A  4EBA 002C                jsr        [PC + 0x2C /* 00000198 */]
  153. 0000016E  4CDF 008C                movem.l    D2,D3,D7, [A7]+
  154. 00000172  221F                     move.l     D1, [A7]+
  155. 00000174  4E75                     rts
  156. export_8:
  157. 00000176  202F 0004